@	/0
		JP	INICIO
NUM_0		K	/0	; 0
NUM_15		K	/f	; 15
NUM_2		K	/2	; 2
NUM_1		K	/1	; 1
VAR_0		K	/00	; param
VAR_1		K	/00	; var1
NUM_3		K	/3	; 3
NUM_5		K	/5	; 5
VAR_2		K	/00	; var1
VAR_3		K	/00	; var2
BOOL_0		K	/00	; bol
FUNC_0		JP	/00
		LD	NUM_0	; VAR_0 = NUM_0
		MM	VAR_0
		LD	NUM_15	; VAR_1 = NUM_15
		MM	VAR_1
		LD	VAR_1	; TEMP_0 = VAR_1
		MM	TEMP_0
		LD	TEMP_0
		MM	ARG_INT
		SC	PRINT_INT
		LD	RESULT_ASC
		PD	/100	; SAIDA = TEMP_0
		LD	NEW_LINE
		PD	/100
LOOP_0		LD	/00
		LD	VAR_0	; TEMP_0 = VAR_0
		MM	TEMP_0
		LD	NUM_2	; TEMP_1 = NUM_2
		MM	TEMP_1
		LD	TEMP_1	; WHILE ( TEMP_0 <= TEMP_1 )
		-	TEMP_0
		JN	ENDLOOP_0
		LD	VAR_0	; TEMP_0 = VAR_0 + NUM_1
		+	NUM_1
		MM	TEMP_0
		LD	TEMP_0	; VAR_0 = TEMP_0
		MM	VAR_0
		LD	VAR_0	; TEMP_0 = VAR_0
		MM	TEMP_0
		LD	TEMP_0
		MM	ARG_INT
		SC	PRINT_INT
		LD	RESULT_ASC
		PD	/100	; SAIDA = TEMP_0
		LD	NEW_LINE
		PD	/100
		JP	LOOP_0
ENDLOOP_0		LD	/00	; END WHILE
		LD	VAR_0	; RETURN VAR_0
		RS	FUNC_0
INICIO		LD	/00
		LD	/01	; BOOL_0 = TRUE
		MM	BOOL_0
		LD	NUM_0	; VAR_2 = NUM_0
		MM	VAR_2
		LD	NUM_3	; VAR_3 = NUM_3
		MM	VAR_3
		SC	FUNC_0
LOOP_1		LD	/00
		LD	VAR_2	; TEMP_0 = VAR_2
		MM	TEMP_0
		LD	VAR_3	; TEMP_2 = VAR_3 * NUM_2
		*	NUM_2
		MM	TEMP_2
		LD	TEMP_2	; TEMP_1 = TEMP_2
		MM	TEMP_1
		LD	TEMP_1	; WHILE ( TEMP_0 < TEMP_1 )
		-	TEMP_0
		JN	ENDLOOP_1
		JZ	ENDLOOP_1
		LD	VAR_2	; TEMP_0 = VAR_2 + NUM_1
		+	NUM_1
		MM	TEMP_0
		LD	TEMP_0	; VAR_2 = TEMP_0
		MM	VAR_2
IF_0		LD	/00
		LD	VAR_2	; TEMP_1 = VAR_2 - NUM_2
		-	NUM_2
		MM	TEMP_1
		LD	TEMP_1	; TEMP_0 = TEMP_1
		MM	TEMP_0
		LD	NUM_0	; TEMP_2 = NUM_0
		MM	TEMP_2
		LD	TEMP_0	; IF ( TEMP_0 > TEMP_2 )
		-	TEMP_2
		JN	ELSE_0
		JZ	ELSE_0
		LD	VAR_2	; TEMP_0 = VAR_2
		MM	TEMP_0
		LD	TEMP_0
		MM	ARG_INT
		SC	PRINT_INT
		LD	RESULT_ASC
		PD	/100	; SAIDA = TEMP_0
		LD	NEW_LINE
		PD	/100
ELSE_0		LD	/00	; ELSE
ENDIF_0		LD	/00	; END IF
		JP	LOOP_1
ENDLOOP_1		LD	/00	; END WHILE
IF_1		LD	/00
		LD	VAR_2	; TEMP_0 = VAR_2
		MM	TEMP_0
		LD	VAR_3	; TEMP_1 = VAR_3
		MM	TEMP_1
		LD	TEMP_0	; IF ( TEMP_0 == TEMP_1 )
		-	TEMP_1
		JZ	IF_EQ_1
		JP	ELSE_1
IF_EQ_1		LD	/00
		LD	VAR_2	; TEMP_1 = VAR_2 + VAR_3
		+	VAR_3
		MM	TEMP_1
		LD	TEMP_1	; TEMP_0 = TEMP_1
		MM	TEMP_0
		LD	TEMP_0
		MM	ARG_INT
		SC	PRINT_INT
		LD	RESULT_ASC
		PD	/100	; SAIDA = TEMP_0
		LD	NEW_LINE
		PD	/100
		JP	ENDIF_1
ELSE_1		LD	/00	; ELSE
		LD	VAR_3	; VAR_2 = VAR_3
		MM	VAR_2
		LD	VAR_2	; TEMP_0 = VAR_2
		MM	TEMP_0
		LD	TEMP_0
		MM	ARG_INT
		SC	PRINT_INT
		LD	RESULT_ASC
		PD	/100	; SAIDA = TEMP_0
		LD	NEW_LINE
		PD	/100
ENDIF_1		LD	/00	; END IF
		LD	VAR_2	; TEMP_0 = VAR_2 * NUM_5
		*	NUM_5
		MM	TEMP_0
		LD	TEMP_0	; TEMP_1 = TEMP_0 / VAR_2
		/	VAR_2
		MM	TEMP_1
		LD	TEMP_1	; TEMP_2 = TEMP_1 + NUM_3
		+	NUM_3
		MM	TEMP_2
		LD	TEMP_2	; VAR_2 = TEMP_2
		MM	VAR_2
		LD	VAR_2	; TEMP_0 = VAR_2
		MM	TEMP_0
		LD	TEMP_0
		MM	ARG_INT
		SC	PRINT_INT
		LD	RESULT_ASC
		PD	/100	; SAIDA = TEMP_0
		LD	NEW_LINE
		PD	/100
FIM		HM	/00
TEMP_0		K	/00
TEMP_1		K	/00
TEMP_2		K	/00
TEMP_3		K	/00
TEMP_4		K	/00
TEMP_5		K	/00
TEMP_6		K	/00
TEMP_7		K	/00
TEMP_8		K	/00
TEMP_9		K	/00
TEMP_10		K	/00
TEMP_11		K	/00
TEMP_12		K	/00
TEMP_13		K	/00
TEMP_14		K	/00
TEMP_15		K	/00
TEMP_16		K	/00
TEMP_17		K	/00
TEMP_18		K	/00
TEMP_19		K	/00
TEMP_20		K	/00
PRINT_INT		JP	/00
		LD	ARG_INT	; CONVERT INT TO ASC
		+	OFFSET
		MM	RESULT_ASC
		LD	STRING_1
		PD	/100	;
		LD	STRING_2
		PD	/100	;
		LD	STRING_3
		PD	/100	;
		LD	STRING_4
		PD	/100	;
		LD	STRING_5
		PD	/100	;
		LD	STRING_6
		PD	/100	;
		LD	STRING_7
		PD	/100	;
		LD	STRING_6
		PD	/100	;
		RS	PRINT_INT
ARG_INT		K	/00	; ARG INT
RESULT_ASC		K	/00	; RESULT ASC
OFFSET		K	/30	; OFFSET
STRING_1		K	/53	; S
STRING_2		K	/41	; A
STRING_3		K	/49	; I
STRING_4		K	/44	; D
STRING_5		K	/41	; A
STRING_6		K	/20	; 
STRING_7		K	/3d	; =
NEW_LINE		K	/0a	; NEW LINE
